﻿module XMLCQ
open System
open System.IO
open CreateDll
open FSharpScene
open PrintQuotation
open UnfoldMonad
open Microsoft.Xna.Framework
open Microsoft.Xna.Framework.Graphics
open Microsoft.FSharp
open Microsoft.FSharp.Core
open Microsoft.FSharp.Collections
open System.Threading
open System.Globalization

Thread.CurrentThread.CurrentCulture <- new CultureInfo("en-US")
Thread.CurrentThread.CurrentUICulture <- new CultureInfo("en-US")

File.WriteAllText("file.fs","module Scene\n#light\nopen UnfoldMonad\nopen X3D_FSharpClass\nopen Component\nopen Microsoft.Xna.Framework\n"+println generate_code)
build_dll


